home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1993 July / InfoMagic USENET CD-ROM July 1993.ISO / sources / x / volume11 / tgif / patch6.04 < prev    next >
Encoding:
Internet Message Format  |  1991-02-12  |  39.8 KB
  1. Path: uunet!lll-winken!sun-barr!newstop!exodus!CS.UCLA.EDU
  2. From: william@CS.UCLA.EDU (William Cheng)
  3. Newsgroups: comp.sources.x
  4. Subject: v11i066: tgif, Patch6, Part04/06
  5. Message-ID: <7936@exodus.Eng.Sun.COM>
  6. Date: 13 Feb 91 07:31:50 GMT
  7. References: <csx-11i063:tgif@uunet.UU.NET>
  8. Sender: news@exodus.Eng.Sun.COM
  9. Lines: 1270
  10. Approved: argv@sun.com
  11.  
  12. Submitted-by: william@CS.UCLA.EDU (William Cheng)
  13. Posting-number: Volume 11, Issue 66
  14. Archive-name: tgif/patch6.04
  15. Patch-To: tgif: Volume 7, Issue 56-76 (original: tgif-1.2)
  16. Patch-To: tgif: Volume 8, Issue 46-48 (Patch1: tgif-1.2 => tgif-1.9)
  17. Patch-To: tgif: Volume 8, Issue 58-60 (Patch2: tgif-1.9 => tgif-1.12)
  18. Patch-To: tgif: Volume 8, Issue 87-89 (Patch3: tgif-1.12 => tgif-1.13)
  19. Patch-To: tgif: Volume 8, Issue 94 (Patch4: tgif-1.13 => tgif-1.14)
  20. Patch-To: tgif: Volume 8, Issue 95 (Patch5: tgif-1.14 => tgif-1.15)
  21.  
  22. ---------------------------------> cut here <---------------------------------
  23. *** oval.c.orig    Wed Dec 12 14:36:17 1990
  24. --- oval.c    Wed Dec 12 14:36:19 1990
  25. ***************
  26. *** 6,10 ****
  27.   #ifndef lint
  28.   static char RCSid[] =
  29. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/oval.c,v 1.7 90/08/13 09:23:35 william Exp $";
  30.   #endif
  31.   
  32. --- 6,10 ----
  33.   #ifndef lint
  34.   static char RCSid[] =
  35. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/oval.c,v 1.11 90/11/10 13:51:00 william Exp $";
  36.   #endif
  37.   
  38. ***************
  39. *** 93,97 ****
  40.      struct ObjRec    * ObjPtr;
  41.   {
  42. !    int            ltx, lty, rbx, rby, xc, yc, a, b, fill, width, pen;
  43.   
  44.      ltx = ObjPtr->obbox.ltx; lty = ObjPtr->obbox.lty;
  45. --- 93,98 ----
  46.      struct ObjRec    * ObjPtr;
  47.   {
  48. !    int    ltx, lty, rbx, rby, xc, yc, a, b, i;
  49. !    int    fill, width, pen, dash, color_index;
  50.   
  51.      ltx = ObjPtr->obbox.ltx; lty = ObjPtr->obbox.lty;
  52. ***************
  53. *** 103,109 ****
  54. --- 104,120 ----
  55.      width = ObjPtr->detail.o->width;
  56.      pen = ObjPtr->detail.o->pen;
  57. +    dash = ObjPtr->detail.o->dash;
  58.   
  59.      if (fill == NONEPAT && pen == NONEPAT) return;
  60.   
  61. +    if (colorDump)
  62. +    {
  63. +       color_index = ObjPtr->color;
  64. +       fprintf (FP, "%.3f %.3f %.3f setrgbcolor\n",
  65. +             ((float)tgifColors[color_index].red/maxRGB),
  66. +             ((float)tgifColors[color_index].green/maxRGB),
  67. +             ((float)tgifColors[color_index].blue/maxRGB));
  68. +    }
  69. + 
  70.      switch (fill)
  71.      {
  72. ***************
  73. *** 128,131 ****
  74. --- 139,150 ----
  75.   
  76.      fprintf (FP, "%1d setlinewidth\n", widthOfLine[width]);
  77. +    if (dash != 0)
  78. +    {
  79. +       fprintf (FP, "[");
  80. +       for (i = 0; i < dashListLength[dash]-1; i++)
  81. +          fprintf (FP, "%1d ", (int)(dashList[dash][i]));
  82. +       fprintf (FP, "%1d] 0 setdash\n",
  83. +             (int)(dashList[dash][dashListLength[dash]-1]));
  84. +    }
  85.   
  86.      switch (pen)
  87. ***************
  88. *** 147,150 ****
  89. --- 166,170 ----
  90.            break;
  91.      }
  92. +    if (dash != 0) fprintf (FP, "[] 0 setdash\n");
  93.      fprintf (FP, "1 setlinewidth\n\n");
  94.   }
  95. ***************
  96. *** 156,160 ****
  97.   {
  98.      struct OvalRec    * oval_ptr = ObjPtr->detail.o;
  99. !    int            fill, width, pen, pixel, real_x_off, real_y_off;
  100.      char            s[80];
  101.      struct BBRec        bbox;
  102. --- 176,180 ----
  103.   {
  104.      struct OvalRec    * oval_ptr = ObjPtr->detail.o;
  105. !    int            fill, width, pen, dash, pixel, real_x_off, real_y_off;
  106.      char            s[80];
  107.      struct BBRec        bbox;
  108. ***************
  109. *** 171,174 ****
  110. --- 191,195 ----
  111.      width = ObjPtr->detail.o->width;
  112.      pen = ObjPtr->detail.o->pen;
  113. +    dash = ObjPtr->detail.o->dash;
  114.      pixel = colorPixels[ObjPtr->color];
  115.   
  116. ***************
  117. *** 191,197 ****
  118.         values.stipple = patPixmap[pen];
  119.         values.line_width = widthOfLine[width] >> zoomScale;
  120.         XChangeGC (mainDisplay, drawGC,
  121. !             GCForeground | GCFunction | GCFillStyle | GCStipple | GCLineWidth,
  122. !             &values);
  123.         XDrawArc (mainDisplay, window, drawGC, bbox.ltx, bbox.lty,
  124.               bbox.rbx-bbox.ltx, bbox.rby-bbox.lty, 0, 360*64);
  125. --- 212,226 ----
  126.         values.stipple = patPixmap[pen];
  127.         values.line_width = widthOfLine[width] >> zoomScale;
  128. +       if (dash != 0)
  129. +       {
  130. +          XSetDashes (mainDisplay, drawGC, 0, dashList[dash],
  131. +                dashListLength[dash]);
  132. +          values.line_style = LineOnOffDash;
  133. +       }
  134. +       else
  135. +          values.line_style = LineSolid;
  136.         XChangeGC (mainDisplay, drawGC,
  137. !             GCForeground | GCFunction | GCFillStyle | GCStipple | GCLineWidth |
  138. !             GCLineStyle, &values);
  139.         XDrawArc (mainDisplay, window, drawGC, bbox.ltx, bbox.lty,
  140.               bbox.rbx-bbox.ltx, bbox.rby-bbox.lty, 0, 360*64);
  141. ***************
  142. *** 211,214 ****
  143. --- 240,244 ----
  144.      oval_ptr->width = lineWidth;
  145.      oval_ptr->pen = penPat;
  146. +    oval_ptr->dash = curDash;
  147.   
  148.      obj_ptr = (struct ObjRec *) calloc (1, sizeof(struct ObjRec));
  149. ***************
  150. *** 257,262 ****
  151.      values.fill_style = FillSolid;
  152.      values.line_width = 0;
  153.      XChangeGC (mainDisplay, drawGC,
  154. !       GCForeground | GCFunction | GCFillStyle | GCLineWidth, &values);
  155.   
  156.      grid_x = end_x = OrigX;
  157. --- 287,294 ----
  158.      values.fill_style = FillSolid;
  159.      values.line_width = 0;
  160. +    values.line_style = LineSolid;
  161.      XChangeGC (mainDisplay, drawGC,
  162. !          GCForeground | GCFunction | GCFillStyle | GCLineWidth | GCLineStyle,
  163. !          &values);
  164.   
  165.      grid_x = end_x = OrigX;
  166. ***************
  167. *** 333,341 ****
  168.      struct ObjRec    * ObjPtr;
  169.   {
  170. !    fprintf (FP, "oval(%s,", colorMenuItems[ObjPtr->color]);
  171. !    fprintf (FP, "%1d,%1d,%1d,%1d,%1d,%1d,%1d,%1d,", ObjPtr->obbox.ltx,
  172.            ObjPtr->obbox.lty, ObjPtr->obbox.rbx, ObjPtr->obbox.rby,
  173.            ObjPtr->detail.o->fill, ObjPtr->detail.o->width,
  174. !          ObjPtr->detail.o->pen, ObjPtr->id);
  175.      SaveAttrs (FP, ObjPtr->lattr);
  176.      fprintf (FP, ")");
  177. --- 365,373 ----
  178.      struct ObjRec    * ObjPtr;
  179.   {
  180. !    fprintf (FP, "oval('%s',", colorMenuItems[ObjPtr->color]);
  181. !    fprintf (FP, "%1d,%1d,%1d,%1d,%1d,%1d,%1d,%1d,%1d,", ObjPtr->obbox.ltx,
  182.            ObjPtr->obbox.lty, ObjPtr->obbox.rbx, ObjPtr->obbox.rby,
  183.            ObjPtr->detail.o->fill, ObjPtr->detail.o->width,
  184. !          ObjPtr->detail.o->pen, ObjPtr->id, ObjPtr->detail.o->dash);
  185.      SaveAttrs (FP, ObjPtr->lattr);
  186.      fprintf (FP, ")");
  187. ***************
  188. *** 348,352 ****
  189.      struct OvalRec    * oval_ptr;
  190.      char            color_str[20], * s;
  191. !    int            ltx, lty, rbx, rby, fill, width, pen, w;
  192.   
  193.      * ObjPtr = (struct ObjRec *) calloc (1, sizeof(struct ObjRec));
  194. --- 380,384 ----
  195.      struct OvalRec    * oval_ptr;
  196.      char            color_str[20], * s;
  197. !    int            ltx, lty, rbx, rby, fill, width, pen, dash, w;
  198.   
  199.      * ObjPtr = (struct ObjRec *) calloc (1, sizeof(struct ObjRec));
  200. ***************
  201. *** 365,368 ****
  202. --- 397,401 ----
  203.         }
  204.         (*ObjPtr)->id = objId++;
  205. +       dash = 0;
  206.      }
  207.      else if (fileVersion <= 7)
  208. ***************
  209. *** 371,376 ****
  210.               <x, <y, &rbx, &rby, &fill, &width, &pen);
  211.         (*ObjPtr)->id = objId++;
  212.      }
  213. !    else
  214.      {
  215.         sscanf (s, "%d , %d, %d , %d , %d , %d , %d , %d",
  216. --- 404,410 ----
  217.               <x, <y, &rbx, &rby, &fill, &width, &pen);
  218.         (*ObjPtr)->id = objId++;
  219. +       dash = 0;
  220.      }
  221. !    else if (fileVersion <= 8)
  222.      {
  223.         sscanf (s, "%d , %d, %d , %d , %d , %d , %d , %d",
  224. ***************
  225. *** 377,381 ****
  226. --- 411,423 ----
  227.               <x, <y, &rbx, &rby, &fill, &width, &pen, &((*ObjPtr)->id));
  228.         if ((*ObjPtr)->id >= objId) objId = (*ObjPtr)->id + 1;
  229. +       dash = 0;
  230.      }
  231. +    else
  232. +    {
  233. +       sscanf (s, "%d , %d, %d , %d , %d , %d , %d , %d , %d",
  234. +             <x, <y, &rbx, &rby, &fill, &width, &pen, &((*ObjPtr)->id),
  235. +             &dash);
  236. +       if ((*ObjPtr)->id >= objId) objId = (*ObjPtr)->id + 1;
  237. +    }
  238.   
  239.      oval_ptr->fill = fill;
  240. ***************
  241. *** 382,385 ****
  242. --- 424,428 ----
  243.      oval_ptr->width = width;
  244.      oval_ptr->pen = pen;
  245. +    oval_ptr->dash = dash;
  246.      (*ObjPtr)->x = ltx;
  247.      (*ObjPtr)->y = lty;
  248. *** pattern.c.orig    Wed Dec 12 14:36:26 1990
  249. --- pattern.c    Wed Dec 12 14:36:29 1990
  250. ***************
  251. *** 6,10 ****
  252.   #ifndef lint
  253.   static char RCSid[] =
  254. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/pattern.c,v 1.3 90/07/11 21:30:41 william Exp $";
  255.   #endif
  256.   
  257. --- 6,10 ----
  258.   #ifndef lint
  259.   static char RCSid[] =
  260. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/pattern.c,v 1.5 90/10/31 11:37:19 william Exp $";
  261.   #endif
  262.   
  263. ***************
  264. *** 30,33 ****
  265. --- 30,34 ----
  266.   int     penPat = SOLIDPAT;
  267.   int     curSpline = LT_STRAIGHT;
  268. + int     curDash = 0;
  269.   
  270.   void ModeMenu (X, Y)
  271. ***************
  272. *** 505,508 ****
  273. --- 506,624 ----
  274.   }
  275.   
  276. + static
  277. + int ChangeObjDashes (ObjPtr, DashIndex)
  278. +    struct ObjRec    * ObjPtr;
  279. +    int            DashIndex;
  280. + {
  281. +    register struct ObjRec    * obj_ptr;
  282. +    int                changed = FALSE;
  283. + 
  284. +    for (obj_ptr = ObjPtr; obj_ptr != NULL; obj_ptr = obj_ptr->prev)
  285. +       switch (obj_ptr->type)
  286. +       {
  287. +          case OBJ_POLY:
  288. +             if (obj_ptr->detail.p->dash != DashIndex)
  289. +             {
  290. +                obj_ptr->detail.p->dash = DashIndex;
  291. +                changed = TRUE;
  292. +             }
  293. +             break;
  294. +          case OBJ_BOX:
  295. +             if (obj_ptr->detail.b->dash != DashIndex)
  296. +             {
  297. +                obj_ptr->detail.b->dash = DashIndex;
  298. +                changed = TRUE;
  299. +             }
  300. +             break;
  301. +          case OBJ_OVAL:
  302. +             if (obj_ptr->detail.o->dash != DashIndex)
  303. +             {
  304. +                obj_ptr->detail.o->dash = DashIndex;
  305. +                changed = TRUE;
  306. +             }
  307. +             break;
  308. +          case OBJ_POLYGON:
  309. +             if (obj_ptr->detail.g->dash != DashIndex)
  310. +             {
  311. +                obj_ptr->detail.g->dash = DashIndex;
  312. +                changed = TRUE;
  313. +             }
  314. +             break;
  315. + 
  316. +          case OBJ_GROUP:
  317. +          case OBJ_SYM:
  318. +             if (ChangeObjLineWidth (obj_ptr->detail.r->last, DashIndex))
  319. +                changed = TRUE;
  320. +             break;
  321. +       }
  322. +    return (changed);
  323. + }
  324. + 
  325. + void ChangeAllSelDashes (DashIndex)
  326. +    int    DashIndex;
  327. + {
  328. +    register struct SelRec    * sel_ptr;
  329. +    register struct ObjRec    * obj_ptr;
  330. +    int                changed = FALSE;
  331. + 
  332. +    if (topSel == NULL)
  333. +    {
  334. +       curDash = DashIndex;
  335. +       ShowLineWidth ();
  336. +       return;
  337. +    }
  338. + 
  339. +    for (sel_ptr = botSel; sel_ptr != NULL; sel_ptr = sel_ptr->prev)
  340. +    {
  341. +       obj_ptr = sel_ptr->obj;
  342. +       switch (obj_ptr->type)
  343. +       {
  344. +          case OBJ_POLY:
  345. +             if (obj_ptr->detail.p->dash != DashIndex)
  346. +             {
  347. +                obj_ptr->detail.p->dash = DashIndex;
  348. +                changed = TRUE;
  349. +             }
  350. +             break;
  351. +          case OBJ_BOX:
  352. +             if (obj_ptr->detail.b->dash != DashIndex)
  353. +             {
  354. +                obj_ptr->detail.b->dash = DashIndex;
  355. +                changed = TRUE;
  356. +             }
  357. +             break;
  358. +          case OBJ_OVAL:
  359. +             if (obj_ptr->detail.o->dash != DashIndex)
  360. +             {
  361. +                obj_ptr->detail.o->dash = DashIndex;
  362. +                changed = TRUE;
  363. +             }
  364. +             break;
  365. +          case OBJ_POLYGON:
  366. +             if (obj_ptr->detail.g->dash != DashIndex)
  367. +             {
  368. +                obj_ptr->detail.g->dash = DashIndex;
  369. +                changed = TRUE;
  370. +             }
  371. +             break;
  372. + 
  373. +          case OBJ_GROUP:
  374. +          case OBJ_SYM:
  375. +             if (ChangeObjDashes (obj_ptr->detail.r->last, DashIndex))
  376. +                changed = TRUE;
  377. +             break;
  378. +       }
  379. +    }
  380. + 
  381. +    if (changed)
  382. +    {
  383. +       SetFileModified (TRUE);
  384. +       HighLightReverse ();
  385. +       RedrawAnArea (botObj, selLtX-(1<<zoomScale), selLtY-(1<<zoomScale),
  386. +             selRbX+(1<<zoomScale), selRbY+(1<<zoomScale));
  387. +       HighLightForward ();
  388. +    }
  389. + }
  390. + 
  391.   void LineStyleMenu (X, Y)
  392.      int    X, Y;
  393. ***************
  394. *** 510,519 ****
  395.      int        index, ltx, lty, rbx, rby, * fore_colors, * valid;
  396.   
  397. !    DefaultColorArrays (MAXLINEWIDTHS+MAXLINETYPES+MAXLINESTYLES, &fore_colors,
  398. !          &valid);
  399.      cfree (valid);
  400.      index = PxMpMenuLoop (X, Y, menuImageW, menuImageH,
  401. !          MAXLINEWIDTHS+MAXLINETYPES+MAXLINESTYLES, 1,
  402. !          MAXLINEWIDTHS+MAXLINETYPES+MAXLINESTYLES,
  403.            fore_colors, lineStylePixmap, SINGLECOLOR);
  404.      if (index == INVALID) return;
  405. --- 626,644 ----
  406.      int        index, ltx, lty, rbx, rby, * fore_colors, * valid;
  407.   
  408. ! /* DefaultColorArrays (MAXLINEWIDTHS+MAXLINETYPES+MAXLINESTYLES, &fore_colors, */
  409. ! /*       &valid); */
  410. ! /* cfree (valid); */
  411. ! /* index = PxMpMenuLoop (X, Y, menuImageW, menuImageH, */
  412. ! /*       MAXLINEWIDTHS+MAXLINETYPES+MAXLINESTYLES, 1, */
  413. ! /*       MAXLINEWIDTHS+MAXLINETYPES+MAXLINESTYLES, */
  414. ! /*       fore_colors, lineStylePixmap, SINGLECOLOR); */
  415. ! /* if (index == INVALID) return; */
  416. ! 
  417. !    DefaultColorArrays (MAXLINEWIDTHS+MAXLINETYPES+MAXDASHES+MAXLINESTYLES,
  418. !          &fore_colors, &valid);
  419.      cfree (valid);
  420.      index = PxMpMenuLoop (X, Y, menuImageW, menuImageH,
  421. !          MAXLINEWIDTHS+MAXLINETYPES+MAXDASHES+MAXLINESTYLES, 1,
  422. !          MAXLINEWIDTHS+MAXLINETYPES+MAXDASHES+MAXLINESTYLES,
  423.            fore_colors, lineStylePixmap, SINGLECOLOR);
  424.      if (index == INVALID) return;
  425. ***************
  426. *** 523,528 ****
  427.      else if (index < MAXLINEWIDTHS+MAXLINETYPES)
  428.         ChangeAllSelLineType (index - MAXLINEWIDTHS);
  429.      else
  430. !       ChangeAllSelLineStyle (index - MAXLINEWIDTHS - MAXLINETYPES);
  431.   }
  432.   
  433. --- 648,655 ----
  434.      else if (index < MAXLINEWIDTHS+MAXLINETYPES)
  435.         ChangeAllSelLineType (index - MAXLINEWIDTHS);
  436. +    else if (index < MAXLINEWIDTHS+MAXLINETYPES+MAXDASHES)
  437. +       ChangeAllSelDashes (index - MAXLINEWIDTHS - MAXLINETYPES);
  438.      else
  439. !       ChangeAllSelLineStyle (index - MAXLINEWIDTHS - MAXLINETYPES - MAXDASHES);
  440.   }
  441.   
  442. *** poly.c.orig    Wed Dec 12 14:36:51 1990
  443. --- poly.c    Wed Dec 12 14:36:54 1990
  444. ***************
  445. *** 6,10 ****
  446.   #ifndef lint
  447.   static char RCSid[] =
  448. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/poly.c,v 1.6 90/08/13 09:23:49 william Exp $";
  449.   #endif
  450.   
  451. --- 6,10 ----
  452.   #ifndef lint
  453.   static char RCSid[] =
  454. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/poly.c,v 1.10 90/11/10 13:51:04 william Exp $";
  455.   #endif
  456.   
  457. ***************
  458. *** 117,120 ****
  459. --- 117,121 ----
  460.      poly_ptr->curved = curSpline;
  461.      poly_ptr->fill = objFill;
  462. +    poly_ptr->dash = curDash;
  463.      obj_ptr = (struct ObjRec *) calloc (1, sizeof(struct ObjRec));
  464.      obj_ptr->color = colorIndex;
  465. ***************
  466. *** 175,181 ****
  467.    */
  468.   
  469. ! void MyLine (Win,Cont,Rb,N,StartX,StartY,EndX,EndY,W,S,P,Pix)
  470.      Window    Win;
  471. !    int        Cont, Rb, N, StartX, StartY, EndX, EndY, W, S, P, Pix;
  472.      /* 'Cont' means continue */
  473.      /* 'Rb' means rubber-band */
  474. --- 176,182 ----
  475.    */
  476.   
  477. ! void MyLine (Win,Cont,Rb,N,StartX,StartY,EndX,EndY,W,S,P,Pix,Dash)
  478.      Window    Win;
  479. !    int        Cont, Rb, N, StartX, StartY, EndX, EndY, W, S, P, Pix, Dash;
  480.      /* 'Cont' means continue */
  481.      /* 'Rb' means rubber-band */
  482. ***************
  483. *** 245,250 ****
  484.         values.fill_style = FillSolid;
  485.         values.line_width = 0;
  486.         XChangeGC (mainDisplay, drawGC,
  487. !             GCForeground | GCFunction | GCFillStyle | GCLineWidth, &values);
  488.      }
  489.      else if (P != 0)
  490. --- 246,253 ----
  491.         values.fill_style = FillSolid;
  492.         values.line_width = 0;
  493. +       values.line_style = LineSolid;
  494.         XChangeGC (mainDisplay, drawGC,
  495. !             GCForeground | GCFunction | GCFillStyle | GCLineWidth | GCLineStyle,
  496. !             &values);
  497.      }
  498.      else if (P != 0)
  499. ***************
  500. *** 255,261 ****
  501.         values.stipple = patPixmap[P];
  502.         values.line_width = widthOfLine[W] >> zoomScale;
  503.         XChangeGC (mainDisplay, drawGC,
  504. !             GCForeground | GCFunction | GCFillStyle | GCStipple | GCLineWidth,
  505. !             &values);
  506.      }
  507.      else
  508. --- 258,272 ----
  509.         values.stipple = patPixmap[P];
  510.         values.line_width = widthOfLine[W] >> zoomScale;
  511. +       if (Dash != 0)
  512. +       {
  513. +          XSetDashes (mainDisplay, drawGC, 0, dashList[Dash],
  514. +                dashListLength[Dash]);
  515. +          values.line_style = LineOnOffDash;
  516. +       }
  517. +       else
  518. +          values.line_style = LineSolid;
  519.         XChangeGC (mainDisplay, drawGC,
  520. !             GCForeground | GCFunction | GCFillStyle | GCStipple | GCLineWidth |
  521. !             GCLineStyle, &values);
  522.      }
  523.      else
  524. ***************
  525. *** 344,350 ****
  526.      values.fill_style = FillSolid;
  527.      values.line_width = 0;
  528.   
  529.      XChangeGC (mainDisplay, drawGC,
  530. !          GCForeground | GCFunction | GCFillStyle | GCLineWidth,
  531.            &values);
  532.   
  533. --- 355,362 ----
  534.      values.fill_style = FillSolid;
  535.      values.line_width = 0;
  536. +    values.line_style = LineSolid;
  537.   
  538.      XChangeGC (mainDisplay, drawGC,
  539. !          GCForeground | GCFunction | GCFillStyle | GCLineWidth | GCLineStyle,
  540.            &values);
  541.   
  542. ***************
  543. *** 362,366 ****
  544.            motion_ev = &(input.xmotion);
  545.            MyLine (drawWindow, CONT, RB, num_pts, OrigX, OrigY, grid_x,
  546. !                grid_y, lineWidth, lineStyle, penPat, xor_pixel);
  547.   
  548.            end_x = motion_ev->x;
  549. --- 374,378 ----
  550.            motion_ev = &(input.xmotion);
  551.            MyLine (drawWindow, CONT, RB, num_pts, OrigX, OrigY, grid_x,
  552. !                grid_y, lineWidth, lineStyle, penPat, xor_pixel,0);
  553.   
  554.            end_x = motion_ev->x;
  555. ***************
  556. *** 369,373 ****
  557.            MarkRulers (grid_x, grid_y);
  558.            MyLine (drawWindow, CONT, RB, num_pts, OrigX, OrigY, grid_x,
  559. !                grid_y, lineWidth, lineStyle, penPat, xor_pixel);
  560.            while (XCheckMaskEvent (mainDisplay, PointerMotionMask, &ev)) ;
  561.         }
  562. --- 381,385 ----
  563.            MarkRulers (grid_x, grid_y);
  564.            MyLine (drawWindow, CONT, RB, num_pts, OrigX, OrigY, grid_x,
  565. !                grid_y, lineWidth, lineStyle, penPat, xor_pixel,0);
  566.            while (XCheckMaskEvent (mainDisplay, PointerMotionMask, &ev)) ;
  567.         }
  568. ***************
  569. *** 376,380 ****
  570.            button_ev = &(input.xbutton);
  571.            MyLine (drawWindow, CONT, RB, num_pts, OrigX, OrigY, grid_x,
  572. !                grid_y, lineWidth, lineStyle, penPat, xor_pixel);
  573.   
  574.            GridXY (end_x, end_y, &grid_x, &grid_y);
  575. --- 388,392 ----
  576.            button_ev = &(input.xbutton);
  577.            MyLine (drawWindow, CONT, RB, num_pts, OrigX, OrigY, grid_x,
  578. !                grid_y, lineWidth, lineStyle, penPat, xor_pixel,0);
  579.   
  580.            GridXY (end_x, end_y, &grid_x, &grid_y);
  581. ***************
  582. *** 394,398 ****
  583.                     MyLine (drawWindow, CONT, NORB, num_pts-1, OrigX, OrigY,
  584.                           grid_x, grid_y, lineWidth, lineStyle, penPat,
  585. !                         pixel);
  586.                  OrigX = grid_x;
  587.                  OrigY = grid_y;
  588. --- 406,410 ----
  589.                     MyLine (drawWindow, CONT, NORB, num_pts-1, OrigX, OrigY,
  590.                           grid_x, grid_y, lineWidth, lineStyle, penPat,
  591. !                         pixel,0);
  592.                  OrigX = grid_x;
  593.                  OrigY = grid_y;
  594. ***************
  595. *** 404,408 ****
  596.                     MyLine (drawWindow, NOCONT, NORB, num_pts-1, OrigX,
  597.                           OrigY, grid_x, grid_y, lineWidth, lineStyle,
  598. !                         penPat, pixel);
  599.   
  600.                  done = TRUE;
  601. --- 416,420 ----
  602.                     MyLine (drawWindow, NOCONT, NORB, num_pts-1, OrigX,
  603.                           OrigY, grid_x, grid_y, lineWidth, lineStyle,
  604. !                         penPat, pixel,0);
  605.   
  606.                  done = TRUE;
  607. ***************
  608. *** 416,424 ****
  609.      {
  610.         CreatePolyObj (num_pts);
  611. !       if (topObj->detail.p->curved == LT_SPLINE ||
  612. !             topObj->detail.p->fill != NONEPAT)
  613. !          RedrawAnArea (botObj, topObj->bbox.ltx-(1<<zoomScale),
  614. !                topObj->bbox.lty-(1<<zoomScale), topObj->bbox.rbx+(1<<zoomScale),
  615. !                topObj->bbox.rby+(1<<zoomScale));
  616.         polyDrawn = TRUE;
  617.         SetFileModified (TRUE);
  618. --- 428,434 ----
  619.      {
  620.         CreatePolyObj (num_pts);
  621. !       RedrawAnArea (botObj, topObj->bbox.ltx-(1<<zoomScale),
  622. !             topObj->bbox.lty-(1<<zoomScale), topObj->bbox.rbx+(1<<zoomScale),
  623. !             topObj->bbox.rby+(1<<zoomScale));
  624.         polyDrawn = TRUE;
  625.         SetFileModified (TRUE);
  626. ***************
  627. *** 473,477 ****
  628.   {
  629.      XPoint    * v;
  630. !    int        num_pts, fill, pen, width, curved, w, aw, ah, dy, dx;
  631.   
  632.      fill = ObjPtr->detail.p->fill;
  633. --- 483,488 ----
  634.   {
  635.      XPoint    * v;
  636. !    int        i, num_pts, fill, pen, width, curved, dash, color_index;
  637. !    int        w, aw, ah, dy, dx;
  638.   
  639.      fill = ObjPtr->detail.p->fill;
  640. ***************
  641. *** 479,485 ****
  642. --- 490,508 ----
  643.      pen = ObjPtr->detail.p->pen;
  644.      curved = ObjPtr->detail.p->curved;
  645. +    dash = ObjPtr->detail.p->dash;
  646.      v = ObjPtr->detail.p->vlist;
  647.      num_pts = ObjPtr->detail.p->n;
  648.   
  649. +    if (fill == NONEPAT && pen == NONEPAT) return;
  650. + 
  651. +    if (colorDump)
  652. +    {
  653. +       color_index = ObjPtr->color;
  654. +       fprintf (FP, "%.3f %.3f %.3f setrgbcolor\n",
  655. +             ((float)tgifColors[color_index].red/maxRGB),
  656. +             ((float)tgifColors[color_index].green/maxRGB),
  657. +             ((float)tgifColors[color_index].blue/maxRGB));
  658. +    }
  659. + 
  660.      if (fill != NONEPAT && num_pts > 2)
  661.      {
  662. ***************
  663. *** 545,549 ****
  664.      }
  665.   
  666. !    if (pen == NONEPAT) return;
  667.      fprintf (FP, "gsave\n");
  668.   
  669. --- 568,573 ----
  670.      }
  671.   
  672. !    if (pen == NONEPAT) { fprintf (FP, "\n"); return; }
  673. ! 
  674.      fprintf (FP, "gsave\n");
  675.   
  676. ***************
  677. *** 562,565 ****
  678. --- 586,597 ----
  679.   
  680.      fprintf (FP, "   %1d setlinewidth\n", w);
  681. +    if (dash != 0)
  682. +    {
  683. +       fprintf (FP, "   [");
  684. +       for (i = 0; i < dashListLength[dash]-1; i++)
  685. +          fprintf (FP, "%1d ", (int)(dashList[dash][i]));
  686. +       fprintf (FP, "%1d] 0 setdash\n",
  687. +             (int)(dashList[dash][dashListLength[dash]-1]));
  688. +    }
  689.   
  690.      fprintf (FP, "newpath\n   %1d %1d moveto\n", v[0].x, v[0].y);
  691. ***************
  692. *** 622,626 ****
  693.      register struct PolyRec    * poly_ptr = ObjPtr->detail.p;
  694.      XPoint            * pv = poly_ptr->vlist, * v;
  695. !    int                pen, width, pixel, fill, curved, n;
  696.      int                x1, y1, x2, y2, ah, real_x_off, real_y_off;
  697.      Pixmap            tile;
  698. --- 654,658 ----
  699.      register struct PolyRec    * poly_ptr = ObjPtr->detail.p;
  700.      XPoint            * pv = poly_ptr->vlist, * v;
  701. !    int                pen, width, pixel, fill, curved, n, dash;
  702.      int                x1, y1, x2, y2, ah, real_x_off, real_y_off;
  703.      Pixmap            tile;
  704. ***************
  705. *** 632,639 ****
  706.      pen = poly_ptr->pen;
  707.      curved = poly_ptr->curved;
  708.      pixel = colorPixels[ObjPtr->color];
  709.   
  710.      if (curved == LT_SPLINE)
  711. !       DrawSplinePolyObj (Win, XOff, YOff, fill, width, pen, pixel, poly_ptr);
  712.      else
  713.      {
  714. --- 664,673 ----
  715.      pen = poly_ptr->pen;
  716.      curved = poly_ptr->curved;
  717. +    dash = poly_ptr->dash;
  718.      pixel = colorPixels[ObjPtr->color];
  719.   
  720.      if (curved == LT_SPLINE)
  721. !       DrawSplinePolyObj (Win, XOff, YOff, fill, width, pen, dash, pixel,
  722. !             poly_ptr);
  723.      else
  724.      {
  725. ***************
  726. *** 671,675 ****
  727.   
  728.            MyLine (Win, CONT, NORB, i+1, x1, y1, x2, y2, poly_ptr->width,
  729. !                poly_ptr->style, pen, pixel);
  730.         }
  731.         x1 = (pv[i].x-real_x_off)>>zoomScale;
  732. --- 705,709 ----
  733.   
  734.            MyLine (Win, CONT, NORB, i+1, x1, y1, x2, y2, poly_ptr->width,
  735. !                poly_ptr->style, pen, pixel, dash);
  736.         }
  737.         x1 = (pv[i].x-real_x_off)>>zoomScale;
  738. ***************
  739. *** 679,683 ****
  740.   
  741.         MyLine (Win, NOCONT, NORB, i+1, x1, y1, x2, y2, poly_ptr->width,
  742. !             poly_ptr->style, pen, pixel);
  743.      }
  744.   }
  745. --- 713,717 ----
  746.   
  747.         MyLine (Win, NOCONT, NORB, i+1, x1, y1, x2, y2, poly_ptr->width,
  748. !             poly_ptr->style, pen, pixel, dash);
  749.      }
  750.   }
  751. ***************
  752. *** 691,695 ****
  753.   
  754.      n = poly_ptr->n;
  755. !    fprintf (FP, "poly(%s,%1d,[", colorMenuItems[ObjPtr->color], poly_ptr->n);
  756.      for (i = 0; i < n-1; i++)
  757.      {
  758. --- 725,729 ----
  759.   
  760.      n = poly_ptr->n;
  761. !    fprintf (FP, "poly('%s',%1d,[", colorMenuItems[ObjPtr->color], poly_ptr->n);
  762.      for (i = 0; i < n-1; i++)
  763.      {
  764. ***************
  765. *** 697,702 ****
  766.      }
  767.      fprintf (FP, "%1d,%1d", poly_ptr->vlist[n-1].x, poly_ptr->vlist[n-1].y);
  768. !    fprintf (FP, "],%1d,%1d,%1d,%1d,%1d,%1d,", poly_ptr->style, poly_ptr->width,
  769. !          poly_ptr->pen, ObjPtr->id, poly_ptr->curved, poly_ptr->fill);
  770.      SaveAttrs (FP, ObjPtr->lattr);
  771.      fprintf (FP, ")");
  772. --- 731,736 ----
  773.      }
  774.      fprintf (FP, "%1d,%1d", poly_ptr->vlist[n-1].x, poly_ptr->vlist[n-1].y);
  775. !    fprintf (FP, "],%1d,%1d,%1d,%1d,%1d,%1d,%1d,", poly_ptr->style, poly_ptr->width,
  776. !          poly_ptr->pen, ObjPtr->id, poly_ptr->curved, poly_ptr->fill, poly_ptr->dash);
  777.      SaveAttrs (FP, ObjPtr->lattr);
  778.      fprintf (FP, ")");
  779. ***************
  780. *** 754,757 ****
  781. --- 788,792 ----
  782.            case 2: poly_ptr->width = 6; break;
  783.         }
  784. +       poly_ptr->dash = 0;
  785.      }
  786.      else if (fileVersion <= 3)
  787. ***************
  788. *** 773,776 ****
  789. --- 808,812 ----
  790.            case 2: poly_ptr->width = 6; break;
  791.         }
  792. +       poly_ptr->dash = 0;
  793.      }
  794.      else if (fileVersion <= 4)
  795. ***************
  796. *** 786,789 ****
  797. --- 822,826 ----
  798.            case 2: poly_ptr->width = 6; break;
  799.         }
  800. +       poly_ptr->dash = 0;
  801.      }
  802.      else if (fileVersion <= 5)
  803. ***************
  804. *** 798,803 ****
  805.            case 2: poly_ptr->width = 6; break;
  806.         }
  807.      }
  808. !    else
  809.      {
  810.         sscanf (s, "%d , %d , %d , %d, %d, %d", &(poly_ptr->style),
  811. --- 835,841 ----
  812.            case 2: poly_ptr->width = 6; break;
  813.         }
  814. +       poly_ptr->dash = 0;
  815.      }
  816. !    else if (fileVersion <= 8)
  817.      {
  818.         sscanf (s, "%d , %d , %d , %d, %d, %d", &(poly_ptr->style),
  819. ***************
  820. *** 804,807 ****
  821. --- 842,853 ----
  822.               &(poly_ptr->width), &(poly_ptr->pen), &((*ObjPtr)->id),
  823.               &(poly_ptr->curved), &(poly_ptr->fill));
  824. +       if ((*ObjPtr)->id >= objId) objId = (*ObjPtr)->id + 1;
  825. +       poly_ptr->dash = 0;
  826. +    }
  827. +    else
  828. +    {
  829. +       sscanf (s, "%d , %d , %d , %d , %d , %d , %d", &(poly_ptr->style),
  830. +             &(poly_ptr->width), &(poly_ptr->pen), &((*ObjPtr)->id),
  831. +             &(poly_ptr->curved), &(poly_ptr->fill), &(poly_ptr->dash));
  832.         if ((*ObjPtr)->id >= objId) objId = (*ObjPtr)->id + 1;
  833.      }
  834. *** polygon.c.orig    Wed Dec 12 14:37:07 1990
  835. --- polygon.c    Wed Dec 12 14:37:09 1990
  836. ***************
  837. *** 6,10 ****
  838.   #ifndef lint
  839.   static char RCSid[] =
  840. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/polygon.c,v 1.5 90/08/13 09:23:36 william Exp $";
  841.   #endif
  842.   
  843. --- 6,10 ----
  844.   #ifndef lint
  845.   static char RCSid[] =
  846. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/polygon.c,v 1.9 90/11/10 13:51:09 william Exp $";
  847.   #endif
  848.   
  849. ***************
  850. *** 52,56 ****
  851.   {
  852.      XPoint    * v = ObjPtr->detail.g->vlist;
  853. !    int        num_pts = ObjPtr->detail.g->n, fill, width, pen, curved;
  854.   
  855.      fill = ObjPtr->detail.g->fill;
  856. --- 52,57 ----
  857.   {
  858.      XPoint    * v = ObjPtr->detail.g->vlist;
  859. !    int        num_pts = ObjPtr->detail.g->n, i;
  860. !    int        fill, width, pen, curved, dash, color_index;
  861.   
  862.      fill = ObjPtr->detail.g->fill;
  863. ***************
  864. *** 58,62 ****
  865. --- 59,75 ----
  866.      pen = ObjPtr->detail.g->pen;
  867.      curved = ObjPtr->detail.g->curved;
  868. +    dash = ObjPtr->detail.g->dash;
  869.   
  870. +    if (fill == NONEPAT && pen == NONEPAT) return;
  871. + 
  872. +    if (colorDump)
  873. +    {
  874. +       color_index = ObjPtr->color;
  875. +       fprintf (FP, "%.3f %.3f %.3f setrgbcolor\n",
  876. +             ((float)tgifColors[color_index].red/maxRGB),
  877. +             ((float)tgifColors[color_index].green/maxRGB),
  878. +             ((float)tgifColors[color_index].blue/maxRGB));
  879. +    }
  880. + 
  881.      if (fill != NONEPAT)
  882.      {
  883. ***************
  884. *** 115,177 ****
  885.      }
  886.   
  887. !    if (pen != NONEPAT)
  888.      {
  889. !       fprintf (FP, "%1d setlinewidth\n", widthOfLine[width]);
  890.   
  891. !       switch (curved)
  892. !       {
  893. !          case LT_STRAIGHT:
  894. !             switch (pen)
  895. !             {
  896. !                case SOLIDPAT:
  897. !                   fprintf (FP, "newpath\n   %1d %1d moveto\n", v[0].x, v[0].y);
  898. !                   DumpPoints (FP, num_pts-1, v, 3);
  899. !                   fprintf (FP, "closepath stroke\n");
  900. !                   break;
  901. !                case BACKPAT:
  902. !                   fprintf (FP, "newpath\n   %1d %1d moveto\n", v[0].x, v[0].y);
  903. !                   DumpPoints (FP, num_pts-1, v, 3);
  904. !                   fprintf (FP, "closepath 1 setgray stroke 0 setgray\n");
  905. !                   break;
  906. !                default:
  907. !                   fprintf (FP, "gsave\n");
  908. !                   fprintf (FP, "   pat%1d 8 1 0 72 300 32 div div setpattern\n",
  909. !                         pen);
  910. !                   fprintf (FP, "   newpath\n");
  911. !                   fprintf (FP, "      %1d %1d moveto\n", v[0].x, v[0].y);
  912. !                   DumpPoints (FP, num_pts-1, v, 6);
  913. !                   fprintf (FP, "   closepath stroke\n");
  914. !                   fprintf (FP, "grestore\n");
  915. !                   break;
  916. !             }
  917. !             break;
  918. !          case LT_SPLINE:
  919. !             switch (pen)
  920. !             {
  921. !                case SOLIDPAT:
  922. !                   fprintf (FP, "newpath\n");
  923. !                   DumpCurvedPolygonPoints (FP, num_pts, v, 3);
  924. !                   fprintf (FP, "closepath stroke\n");
  925. !                   break;
  926. !                case BACKPAT:
  927. !                   fprintf (FP, "newpath\n");
  928. !                   DumpCurvedPolygonPoints (FP, num_pts, v, 3);
  929. !                   fprintf (FP, "closepath 1 setgray stroke 0 setgray\n");
  930. !                   break;
  931. !                default:
  932. !                   fprintf (FP, "gsave\n");
  933. !                   fprintf (FP, "   pat%1d 8 1 0 72 300 32 div div setpattern\n",
  934. !                         pen);
  935. !                   fprintf (FP, "   newpath\n");
  936. !                   DumpCurvedPolygonPoints (FP, num_pts, v, 6);
  937. !                   fprintf (FP, "   closepath stroke\n");
  938. !                   fprintf (FP, "grestore\n");
  939. !                   break;
  940. !             }
  941. !             break;
  942. !       }
  943. !       fprintf (FP, "1 setlinewidth\n");
  944.      }
  945. !    fprintf (FP, "\n");
  946.   }
  947.   
  948. --- 128,197 ----
  949.      }
  950.   
  951. !    if (pen == NONEPAT) { fprintf (FP, "\n"); return; }
  952. ! 
  953. !    fprintf (FP, "%1d setlinewidth\n", widthOfLine[width]);
  954. !    if (dash != 0)
  955.      {
  956. !       fprintf (FP, "[");
  957. !       for (i = 0; i < dashListLength[dash]-1; i++)
  958. !          fprintf (FP, "%1d ", (int)(dashList[dash][i]));
  959. !       fprintf (FP, "%1d] 0 setdash\n",
  960. !             (int)(dashList[dash][dashListLength[dash]-1]));
  961. !    }
  962.   
  963. !    switch (curved)
  964. !    {
  965. !       case LT_STRAIGHT:
  966. !          switch (pen)
  967. !          {
  968. !             case SOLIDPAT:
  969. !                fprintf (FP, "newpath\n   %1d %1d moveto\n", v[0].x, v[0].y);
  970. !                DumpPoints (FP, num_pts-1, v, 3);
  971. !                fprintf (FP, "closepath stroke\n");
  972. !                break;
  973. !             case BACKPAT:
  974. !                fprintf (FP, "newpath\n   %1d %1d moveto\n", v[0].x, v[0].y);
  975. !                DumpPoints (FP, num_pts-1, v, 3);
  976. !                fprintf (FP, "closepath 1 setgray stroke 0 setgray\n");
  977. !                break;
  978. !             default:
  979. !                fprintf (FP, "gsave\n");
  980. !                fprintf (FP, "   pat%1d 8 1 0 72 300 32 div div setpattern\n",
  981. !                      pen);
  982. !                fprintf (FP, "   newpath\n");
  983. !                fprintf (FP, "      %1d %1d moveto\n", v[0].x, v[0].y);
  984. !                DumpPoints (FP, num_pts-1, v, 6);
  985. !                fprintf (FP, "   closepath stroke\n");
  986. !                fprintf (FP, "grestore\n");
  987. !                break;
  988. !          }
  989. !          break;
  990. !       case LT_SPLINE:
  991. !          switch (pen)
  992. !          {
  993. !             case SOLIDPAT:
  994. !                fprintf (FP, "newpath\n");
  995. !                DumpCurvedPolygonPoints (FP, num_pts, v, 3);
  996. !                fprintf (FP, "closepath stroke\n");
  997. !                break;
  998. !             case BACKPAT:
  999. !                fprintf (FP, "newpath\n");
  1000. !                DumpCurvedPolygonPoints (FP, num_pts, v, 3);
  1001. !                fprintf (FP, "closepath 1 setgray stroke 0 setgray\n");
  1002. !                break;
  1003. !             default:
  1004. !                fprintf (FP, "gsave\n");
  1005. !                fprintf (FP, "   pat%1d 8 1 0 72 300 32 div div setpattern\n",
  1006. !                      pen);
  1007. !                fprintf (FP, "   newpath\n");
  1008. !                DumpCurvedPolygonPoints (FP, num_pts, v, 6);
  1009. !                fprintf (FP, "   closepath stroke\n");
  1010. !                fprintf (FP, "grestore\n");
  1011. !                break;
  1012. !          }
  1013. !          break;
  1014.      }
  1015. !    if (dash != 0) fprintf (FP, "[] 0 setdash\n");
  1016. !    fprintf (FP, "1 setlinewidth\n\n");
  1017.   }
  1018.   
  1019. ***************
  1020. *** 184,188 ****
  1021.      XPoint        * v;
  1022.      struct PolygonRec    * polygon_ptr = ObjPtr->detail.g;
  1023. !    int            fill, width, pen, curved, pixel;
  1024.      int            real_x_off, real_y_off;
  1025.      XGCValues        values;
  1026. --- 204,208 ----
  1027.      XPoint        * v;
  1028.      struct PolygonRec    * polygon_ptr = ObjPtr->detail.g;
  1029. !    int            fill, width, pen, curved, dash, pixel;
  1030.      int            real_x_off, real_y_off;
  1031.      XGCValues        values;
  1032. ***************
  1033. *** 192,199 ****
  1034.      pen = polygon_ptr->pen;
  1035.      curved = polygon_ptr->curved;
  1036.      pixel = colorPixels[ObjPtr->color];
  1037.   
  1038.      if (curved == LT_SPLINE)
  1039. !       DrawSplinePolygonObj (Win, XOff, YOff, fill, width, pen, pixel,
  1040.               polygon_ptr);
  1041.      else
  1042. --- 212,220 ----
  1043.      pen = polygon_ptr->pen;
  1044.      curved = polygon_ptr->curved;
  1045. +    dash = polygon_ptr->dash;
  1046.      pixel = colorPixels[ObjPtr->color];
  1047.   
  1048.      if (curved == LT_SPLINE)
  1049. !       DrawSplinePolygonObj (Win, XOff, YOff, fill, width, pen, dash, pixel,
  1050.               polygon_ptr);
  1051.      else
  1052. ***************
  1053. *** 228,234 ****
  1054.            values.stipple = patPixmap[pen];
  1055.            values.line_width = widthOfLine[width] >> zoomScale;
  1056.            XChangeGC (mainDisplay, drawGC,
  1057.                  GCForeground | GCFunction | GCFillStyle | GCStipple |
  1058. !                GCLineWidth, &values);
  1059.   
  1060.            XDrawLines (mainDisplay, Win, drawGC, v, polygon_ptr->n,
  1061. --- 249,263 ----
  1062.            values.stipple = patPixmap[pen];
  1063.            values.line_width = widthOfLine[width] >> zoomScale;
  1064. +          if (dash != 0)
  1065. +          {
  1066. +             XSetDashes (mainDisplay, drawGC, 0, dashList[dash],
  1067. +                   dashListLength[dash]);
  1068. +             values.line_style = LineOnOffDash;
  1069. +          }
  1070. +          else
  1071. +             values.line_style = LineSolid;
  1072.            XChangeGC (mainDisplay, drawGC,
  1073.                  GCForeground | GCFunction | GCFillStyle | GCStipple |
  1074. !                GCLineWidth | GCLineStyle, &values);
  1075.   
  1076.            XDrawLines (mainDisplay, Win, drawGC, v, polygon_ptr->n,
  1077. ***************
  1078. *** 274,277 ****
  1079. --- 303,307 ----
  1080.      polygon_ptr->pen = penPat;
  1081.      polygon_ptr->curved = curSpline;
  1082. +    polygon_ptr->dash = curDash;
  1083.      obj_ptr = (struct ObjRec *) calloc (1, sizeof(struct ObjRec));
  1084.      obj_ptr->color = colorIndex;
  1085. ***************
  1086. *** 320,326 ****
  1087.      values.fill_style = FillSolid;
  1088.      values.line_width = 0;
  1089.   
  1090.      XChangeGC (mainDisplay, drawGC,
  1091. !          GCForeground | GCFunction | GCFillStyle | GCLineWidth,
  1092.            &values);
  1093.   
  1094. --- 350,357 ----
  1095.      values.fill_style = FillSolid;
  1096.      values.line_width = 0;
  1097. +    values.line_style = LineSolid;
  1098.   
  1099.      XChangeGC (mainDisplay, drawGC,
  1100. !          GCForeground | GCFunction | GCFillStyle | GCLineWidth | GCLineStyle,
  1101.            &values);
  1102.   
  1103. ***************
  1104. *** 450,461 ****
  1105.         default:
  1106.            CreatePolygonObj (num_pts);
  1107. !          if (topObj->detail.g->curved == LT_SPLINE)
  1108. !             RedrawAnArea (botObj, topObj->bbox.ltx-(1<<zoomScale),
  1109. !                   topObj->bbox.lty-(1<<zoomScale),
  1110. !                   topObj->bbox.rbx+(1<<zoomScale),
  1111. !                   topObj->bbox.rby+(1<<zoomScale));
  1112. !          else if (objFill != 0)
  1113. !             DrawPolygonObj (drawWindow, drawOrigX, drawOrigY, topObj);
  1114. ! 
  1115.            polygonDrawn = TRUE;
  1116.            SetFileModified (TRUE);
  1117. --- 481,488 ----
  1118.         default:
  1119.            CreatePolygonObj (num_pts);
  1120. !          RedrawAnArea (botObj, topObj->bbox.ltx-(1<<zoomScale),
  1121. !                topObj->bbox.lty-(1<<zoomScale),
  1122. !                topObj->bbox.rbx+(1<<zoomScale),
  1123. !                topObj->bbox.rby+(1<<zoomScale));
  1124.            polygonDrawn = TRUE;
  1125.            SetFileModified (TRUE);
  1126. ***************
  1127. *** 497,501 ****
  1128.   
  1129.      n = polygon_ptr->n;
  1130. !    fprintf (FP, "polygon(%s,%1d,[", colorMenuItems[ObjPtr->color],
  1131.            polygon_ptr->n);
  1132.      for (i = 0; i < n-1; i++)
  1133. --- 524,528 ----
  1134.   
  1135.      n = polygon_ptr->n;
  1136. !    fprintf (FP, "polygon('%s',%1d,[", colorMenuItems[ObjPtr->color],
  1137.            polygon_ptr->n);
  1138.      for (i = 0; i < n-1; i++)
  1139. ***************
  1140. *** 502,508 ****
  1141.         fprintf (FP, "%1d,%1d,", polygon_ptr->vlist[i].x, polygon_ptr->vlist[i].y);
  1142.   
  1143. !    fprintf (FP, "%1d,%1d],%1d,%1d,%1d,%1d,%1d,", polygon_ptr->vlist[n-1].x,
  1144.            polygon_ptr->vlist[n-1].y, polygon_ptr->fill, polygon_ptr->width,
  1145. !          polygon_ptr->pen, polygon_ptr->curved, ObjPtr->id);
  1146.      SaveAttrs (FP, ObjPtr->lattr);
  1147.      fprintf (FP, ")");
  1148. --- 529,535 ----
  1149.         fprintf (FP, "%1d,%1d,", polygon_ptr->vlist[i].x, polygon_ptr->vlist[i].y);
  1150.   
  1151. !    fprintf (FP, "%1d,%1d],%1d,%1d,%1d,%1d,%1d,%1d,", polygon_ptr->vlist[n-1].x,
  1152.            polygon_ptr->vlist[n-1].y, polygon_ptr->fill, polygon_ptr->width,
  1153. !          polygon_ptr->pen, polygon_ptr->curved, ObjPtr->id, polygon_ptr->dash);
  1154.      SaveAttrs (FP, ObjPtr->lattr);
  1155.      fprintf (FP, ")");
  1156. ***************
  1157. *** 518,522 ****
  1158.      char            color_str[20], * s;
  1159.      int            num_pts, ltx, lty, rbx, rby, x, y, fill, width, pen, w;
  1160. !    int            curved;
  1161.   
  1162.      * ObjPtr = (struct ObjRec *) calloc (1, sizeof(struct ObjRec));
  1163. --- 545,549 ----
  1164.      char            color_str[20], * s;
  1165.      int            num_pts, ltx, lty, rbx, rby, x, y, fill, width, pen, w;
  1166. !    int            curved, dash;
  1167.   
  1168.      * ObjPtr = (struct ObjRec *) calloc (1, sizeof(struct ObjRec));
  1169. ***************
  1170. *** 559,562 ****
  1171. --- 586,590 ----
  1172.         }
  1173.         (*ObjPtr)->id = objId++;
  1174. +       dash = 0;
  1175.      }
  1176.      else if (fileVersion <= 5)
  1177. ***************
  1178. *** 569,572 ****
  1179. --- 597,601 ----
  1180.         }
  1181.         (*ObjPtr)->id = objId++;
  1182. +       dash = 0;
  1183.      }
  1184.      else if (fileVersion <= 7)
  1185. ***************
  1186. *** 574,579 ****
  1187.         sscanf (s, "%d , %d , %d , %d", &fill, &width, &pen, &curved);
  1188.         (*ObjPtr)->id = objId++;
  1189.      }
  1190. !    else
  1191.      {
  1192.         sscanf (s, "%d , %d , %d , %d , %d", &fill, &width, &pen, &curved,
  1193. --- 603,609 ----
  1194.         sscanf (s, "%d , %d , %d , %d", &fill, &width, &pen, &curved);
  1195.         (*ObjPtr)->id = objId++;
  1196. +       dash = 0;
  1197.      }
  1198. !    else if (fileVersion <= 8)
  1199.      {
  1200.         sscanf (s, "%d , %d , %d , %d , %d", &fill, &width, &pen, &curved,
  1201. ***************
  1202. *** 580,584 ****
  1203. --- 610,621 ----
  1204.               &((*ObjPtr)->id));
  1205.         if ((*ObjPtr)->id >= objId) objId = (*ObjPtr)->id + 1;
  1206. +       dash = 0;
  1207.      }
  1208. +    else
  1209. +    {
  1210. +       sscanf (s, "%d , %d , %d , %d , %d , %d", &fill, &width, &pen, &curved,
  1211. +             &((*ObjPtr)->id), &dash);
  1212. +       if ((*ObjPtr)->id >= objId) objId = (*ObjPtr)->id + 1;
  1213. +    }
  1214.   
  1215.      polygon_ptr->vlist = v;
  1216. ***************
  1217. *** 590,593 ****
  1218. --- 627,631 ----
  1219.      polygon_ptr->pen = pen;
  1220.      polygon_ptr->curved = curved;
  1221. +    polygon_ptr->dash = dash;
  1222.      (*ObjPtr)->x = ltx;
  1223.      (*ObjPtr)->y = lty;
  1224. *** prtgif.c.orig    Wed Dec 12 14:37:17 1990
  1225. --- prtgif.c    Wed Dec 12 14:37:19 1990
  1226. ***************
  1227. *** 6,10 ****
  1228.   #ifndef lint
  1229.   static char RCSid[] =
  1230. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/prtgif.c,v 1.16 90/08/16 15:28:30 william Exp $";
  1231.   #endif
  1232.   
  1233. --- 6,10 ----
  1234.   #ifndef lint
  1235.   static char RCSid[] =
  1236. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/prtgif.c,v 1.17 90/11/01 13:49:48 william Exp $";
  1237.   #endif
  1238.   
  1239. ***************
  1240. *** 108,119 ****
  1241.      struct ObjRec    * obj_ptr;
  1242.      char         full_name[MAXPATHLENGTH];
  1243.      FILE            * fp;
  1244.   
  1245. !    strcpy (full_name, FileName);
  1246. !    strcat (full_name, ".obj");
  1247.   
  1248.      if ((fp = fopen (full_name, "r")) == NULL)
  1249.      {
  1250. !       printf ("Can not open '%s'.", full_name);
  1251.         return (FALSE);
  1252.      }
  1253. --- 108,123 ----
  1254.      struct ObjRec    * obj_ptr;
  1255.      char         full_name[MAXPATHLENGTH];
  1256. +    int            len;
  1257.      FILE            * fp;
  1258.   
  1259. !    len = strlen (FileName);
  1260. !    if (len >= 4 && strcmp (&FileName[len-4], ".obj") == 0)
  1261. !       strcpy (full_name, FileName);
  1262. !    else
  1263. !       sprintf (full_name, "%s.obj", FileName);
  1264.   
  1265.      if ((fp = fopen (full_name, "r")) == NULL)
  1266.      {
  1267. !       printf ("Can not open '%s'.\n", full_name);
  1268.         return (FALSE);
  1269.      }
  1270. ---------------------------------> cut here <---------------------------------
  1271. -- 
  1272. Bill Cheng // UCLA Computer Science Department // (213) 206-7135
  1273. 3277 Boelter Hall // Los Angeles, California 90024 // USA
  1274. william@CS.UCLA.EDU      ...!{uunet|ucbvax}!cs.ucla.edu!william
  1275.  
  1276. --
  1277. Dan Heller
  1278. ------------------------------------------------
  1279. O'Reilly && Associates               Zyrcom Inc
  1280. Senior Writer                   President
  1281. argv@ora.com            argv@zipcode.com
  1282.